       section   code
       xdef      _main
_main:
       link      A6,#-4
       movem.l   D2,-(A7)
       pea       _isr7
       bsr       _ConfigInterrupt7
       addq.w    #4,A7
       bsr       _enable
main_1:
       bsr       _ReadSlider
       move.b    D0,D2
       and.l     #255,D2
       move.l    D2,-(A7)
       bsr       _WriteBar
       addq.w    #4,A7
       and.w     #255,D2
       and.l     #65535,D2
       move.l    D2,-(A7)
       bsr       _WriteDigitAll
       addq.w    #4,A7
main_2:
       bra       main_1
main_3:
       movem.l   (A7)+,D2
       unlk      A6
       rts
       xdef      _isr7
_isr7:
       movem.l   D0/D1/A0/A1,-(A7)
       subq.w    #4,A7
       bsr       _ReadLedAll
       move.b    D0,3(A7)
       move.b    3(A7),D1
       not.b     D1
       and.l     #255,D1
       move.l    D1,-(A7)
       bsr       _WriteLedAll
       addq.w    #4,A7
       addq.w    #4,A7
       movem.l   (A7)+,D0/D1/A0/A1
       rte
       xref      _WriteDigitAll
       xref      _ConfigInterrupt7
       xref      _WriteLedAll
       xref      _WriteBar
       xref      _ReadLedAll
       xref      _ReadSlider
       xref      _enable
